﻿Imports Microsoft.VisualBasic

Public Class MyError
    Public Shared Sub mostrarError(ByVal strerror As String, ByVal pagina As Page)
        CType(pagina.Master.FindControl("lblError"), Label).Visible = True
        CType(pagina.Master.FindControl("lblError"), Label).Text = strerror
    End Sub
    Public Shared Sub BorrarError(ByVal pagina As Page)
        CType(pagina.Master.FindControl("lblError"), Label).Visible = False
        CType(pagina.Master.FindControl("lblError"), Label).Text = ""
    End Sub

End Class
